home *** CD-ROM | disk | FTP | other *** search
/ Aminet 28 / Aminet 28 (1998)(GTI - Schatztruhe)[!][Dec 1998].iso / Aminet / dev / basic / UDP_Chat.lha / UDPChat / Old_Stuff / TCPFuncs.bb < prev    next >
Unknown  |  1998-01-25  |  2.9 KB
view JSON data     |     view as text     |     open on a Mac     |     open on a PC

This file was not able to be converted.
This format is not currently supported by dexvert.

ConfidenceProgramDetectionMatch TypeSupport
100% file data default
100% gt2 Kopftext: ';-----------------------------------------------------------' default (weak)


hex view
+--------+-------------------------+-------------------------+--------+--------+
|00000000| 3b 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;-------|--------|
|00000010| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000020| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000030| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 00 3b 20 53 |--------|----.; S|
|00000040| 74 61 6e 64 61 72 64 20 | 42 6c 69 74 7a 20 54 43 |tandard |Blitz TC|
|00000050| 50 20 46 75 6e 63 74 69 | 6f 6e 73 20 56 31 2e 35 |P Functi|ons V1.5|
|00000060| 20 62 79 20 50 61 75 6c | 20 42 75 72 6b 65 79 20 | by Paul| Burkey |
|00000070| 28 63 29 31 39 39 37 00 | 3b 20 43 6f 6d 70 69 6c |(c)1997.|; Compil|
|00000080| 65 64 20 77 69 74 68 20 | 68 65 6c 70 20 66 72 6f |ed with |help fro|
|00000090| 6d 20 45 72 63 6f 6c 65 | 20 53 70 69 74 65 72 69 |m Ercole| Spiteri|
|000000a0| 20 61 6e 64 20 41 6e 74 | 6f 6e 20 52 65 69 6e 61 | and Ant|on Reina|
|000000b0| 75 65 72 00 3b 20 59 6f | 75 20 6d 75 73 74 20 68 |uer.; Yo|u must h|
|000000c0| 61 76 65 20 74 68 65 20 | 62 73 64 73 6f 63 6b 65 |ave the |bsdsocke|
|000000d0| 74 2e 6c 69 62 72 61 72 | 79 20 73 65 74 75 70 20 |t.librar|y setup |
|000000e0| 69 6e 20 42 6c 69 74 7a | 00 3b 20 43 6f 6e 74 61 |in Blitz|.; Conta|
|000000f0| 63 74 20 6d 65 20 61 74 | 20 70 61 75 6c 40 73 6e |ct me at| paul@sn|
|00000100| 65 65 63 68 2e 64 65 6d | 6f 6e 2e 63 6f 2e 75 6b |eech.dem|on.co.uk|
|00000110| 00 3b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;------|--------|
|00000120| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000130| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000140| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 00 3b 00 |--------|-----.;.|
|00000150| 3b 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;-------|--------|
|00000160| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000170| 2d 2d 00 3b 20 54 43 50 | 20 6c 69 62 72 61 72 79 |--.; TCP| library|
|00000180| 20 56 61 72 69 61 62 6c | 65 73 2f 43 6f 6e 73 74 | Variabl|es/Const|
|00000190| 61 6e 74 73 00 3b 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ants.;--|--------|
|000001a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000001b0| 2d 2d 2d 2d 2d 2d 2d 00 | 00 54 43 50 6d 65 6d 2e |-------.|.TCPmem.|
|000001c0| 6c 3d a6 08 28 24 32 30 | 30 30 2c 30 29 20 20 3b |l=..($20|00,0)  ;|
|000001d0| 41 6c 6c 6f 63 61 74 65 | 20 74 65 6d 70 20 62 75 |Allocate| temp bu|
|000001e0| 66 66 65 72 20 75 73 65 | 64 20 66 6f 72 20 61 6c |ffer use|d for al|
|000001f0| 6c 20 54 43 50 20 72 65 | 61 64 73 00 23 46 49 4f |l TCP re|ads.#FIO|
|00000200| 4e 52 45 41 44 3d 24 34 | 30 30 34 36 36 37 66 20 |NREAD=$4|004667f |
|00000210| 20 20 20 20 20 20 20 20 | 3b 46 49 4f 4e 52 45 41 |        |;FIONREA|
|00000220| 44 20 72 65 71 75 65 73 | 74 00 00 3b 2d 2d 2d 2d |D reques|t..;----|
|00000230| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000240| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 00 3b 20 |--------|-----.; |
|00000250| 53 74 61 6e 64 61 72 64 | 20 54 43 50 20 6c 69 62 |Standard| TCP lib|
|00000260| 72 61 72 79 20 73 74 72 | 75 63 74 75 72 65 73 00 |rary str|uctures.|
|00000270| 3b 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |;-------|--------|
|00000280| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|00000290| 2d 2d 00 00 80 01 2e 6c | 69 73 74 00 20 20 2a 49 |--.....l|ist.  *I|
|000002a0| 74 65 6d 41 2e 62 00 20 | 20 2a 49 74 65 6d 42 2e |temA.b. | *ItemB.|
|000002b0| 62 00 80 02 20 80 01 00 | 80 01 2e 69 6e 61 64 64 |b... ...|...inadd|
|000002c0| 72 00 20 20 73 5f 61 64 | 64 72 2e 6c 00 80 02 20 |r.  s_ad|dr.l... |
|000002d0| 80 01 00 80 01 2e 73 6f | 63 6b 61 64 64 72 69 6e |......so|ckaddrin|
|000002e0| 00 20 20 73 69 6e 5f 6c | 65 6e 2e 62 00 20 20 73 |.  sin_l|en.b.  s|
|000002f0| 69 6e 5f 66 61 6d 69 6c | 79 2e 62 00 20 20 73 69 |in_famil|y.b.  si|
|00000300| 6e 5f 70 6f 72 74 2e 77 | 00 20 20 73 69 6e 5f 61 |n_port.w|.  sin_a|
|00000310| 64 64 72 2e 69 6e 61 64 | 64 72 00 20 20 73 69 6e |ddr.inad|dr.  sin|
|00000320| 5f 7a 65 72 6f 2e 62 5b | 38 5d 00 80 02 20 80 01 |_zero.b[|8]... ..|
|00000330| 00 80 01 2e 68 6f 73 74 | 65 6e 74 00 20 20 2a 68 |....host|ent.  *h|
|00000340| 5f 6e 61 6d 65 2e 62 00 | 20 20 2a 68 5f 61 6c 69 |_name.b.|  *h_ali|
|00000350| 61 73 65 73 2e 6c 69 73 | 74 00 20 20 68 5f 61 64 |ases.lis|t.  h_ad|
|00000360| 64 72 74 79 70 65 2e 6c | 00 20 20 68 5f 6c 65 6e |drtype.l|.  h_len|
|00000370| 67 74 68 2e 6c 00 20 20 | 2a 68 5f 61 64 64 72 5f |gth.l.  |*h_addr_|
|00000380| 6c 69 73 74 2e 6c 69 73 | 74 00 80 02 20 80 01 00 |list.lis|t... ...|
|00000390| 00 3b 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |.;------|--------|
|000003a0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003b0| 2d 2d 2d 00 3b 20 53 74 | 61 6e 64 61 72 64 20 54 |---.; St|andard T|
|000003c0| 43 50 20 42 6c 69 74 7a | 20 46 75 6e 63 74 69 6f |CP Blitz| Functio|
|000003d0| 6e 73 00 3b 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |ns.;----|--------|
|000003e0| 2d 2d 2d 2d 2d 2d 2d 2d | 2d 2d 2d 2d 2d 2d 2d 2d |--------|--------|
|000003f0| 2d 2d 2d 2d 2d 00 00 00 | 2e 52 65 61 64 54 43 50 |-----...|.ReadTCP|
|00000400| 00 80 09 20 2e 73 20 52 | 65 61 64 54 43 50 7b 7d |... .s R|eadTCP{}|
|00000410| 00 20 20 80 15 20 73 6f | 63 6b 2e 6c 2c 54 43 50 |.  .. so|ck.l,TCP|
|00000420| 6d 65 6d 2e 6c 00 20 20 | 3b 00 20 20 3b 20 54 68 |mem.l.  |;.  ; Th|
|00000430| 69 73 20 46 75 6e 63 74 | 69 6f 6e 20 72 65 61 64 |is Funct|ion read|
|00000440| 73 20 64 61 74 61 20 66 | 72 6f 6d 20 74 68 65 20 |s data f|rom the |
|00000450| 73 65 72 76 65 72 20 74 | 68 65 20 72 65 73 75 6c |server t|he resul|
|00000460| 74 20 69 73 20 70 61 73 | 73 65 64 20 62 61 63 6b |t is pas|sed back|
|00000470| 20 69 6e 20 61 00 20 20 | 3b 20 73 74 72 69 6e 67 | in a.  |; string|
|00000480| 2e 20 49 66 20 74 68 65 | 72 65 20 69 73 20 6e 6f |. If the|re is no|
|00000490| 20 6d 65 73 73 61 67 65 | 73 20 74 68 65 6e 20 69 | message|s then i|
|000004a0| 74 20 77 69 6c 6c 20 72 | 65 74 75 72 6e 20 61 6e |t will r|eturn an|
|000004b0| 20 65 6d 70 74 79 20 73 | 74 72 69 6e 67 20 3d 22 | empty s|tring ="|
|000004c0| 22 00 20 20 3b 00 20 20 | 73 6f 63 6b 72 65 61 64 |".  ;.  |sockread|
|000004d0| 2e 6c 3d 30 20 20 20 20 | 20 20 20 20 20 20 20 20 |.l=0    |        |
|000004e0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000004f0| 20 20 3b 43 6c 65 61 72 | 20 52 65 61 64 6d 61 73 |  ;Clear| Readmas|
|00000500| 6b 00 20 20 73 6f 63 6b | 72 65 61 64 2e 6c 20 80 |k.  sock|read.l .|
|00000510| ce 20 73 6f 63 6b 2e 6c | 20 20 20 20 20 20 20 20 |. sock.l|        |
|00000520| 20 20 20 20 20 20 20 20 | 20 20 3b 53 65 74 20 52 |        |  ;Set R|
|00000530| 65 61 64 6d 61 73 6b 20 | 6f 6e 20 6f 75 72 20 73 |eadmask |on our s|
|00000540| 6f 63 6b 65 74 00 20 20 | 65 3d ec 8f 28 73 6f 63 |ocket.  |e=..(soc|
|00000550| 6b 2e 6c 2c 23 46 49 4f | 4e 52 45 41 44 2c 54 43 |k.l,#FIO|NREAD,TC|
|00000560| 50 6d 65 6d 2e 6c 29 20 | 3b 48 6f 77 20 6d 75 63 |Pmem.l) |;How muc|
|00000570| 68 20 64 61 74 61 20 69 | 73 20 74 68 65 72 65 3f |h data i|s there?|
|00000580| 00 20 20 66 3d da 02 2e | 6c 28 54 43 50 6d 65 6d |.  f=...|l(TCPmem|
|00000590| 2e 6c 29 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |.l)     |        |
|000005a0| 20 20 20 20 20 20 20 20 | 20 20 20 3b 50 6c 61 63 |        |   ;Plac|
|000005b0| 65 20 76 61 6c 75 65 20 | 69 6e 20 66 00 20 20 80 |e value |in f.  .|
|000005c0| 0b 20 66 3e 30 00 20 20 | 20 20 63 3d ec 89 28 73 |. f>0.  |  c=..(s|
|000005d0| 6f 63 6b 2e 6c 2c 54 43 | 50 6d 65 6d 2e 6c 2c 66 |ock.l,TC|Pmem.l,f|
|000005e0| 2c 30 29 20 20 20 20 20 | 20 20 20 20 20 20 20 3b |,0)     |       ;|
|000005f0| 52 65 61 64 20 61 6c 6c | 20 64 61 74 61 00 20 20 |Read all| data.  |
|00000600| 20 20 61 3d 30 20 3a 20 | 63 24 3d 22 22 00 20 20 |  a=0 : |c$="".  |
|00000610| 20 20 80 bb 00 20 20 20 | 20 20 20 63 24 3d 63 24 |  ...   |   c$=c$|
|00000620| 2b dc 86 28 da 02 2e 62 | 28 54 43 50 6d 65 6d 2e |+..(...b|(TCPmem.|
|00000630| 6c 2b 61 29 29 20 3a 20 | 61 2b 31 00 20 20 20 20 |l+a)) : |a+1.    |
|00000640| 80 bc 20 61 3d 66 00 20 | 20 80 c0 00 20 20 3b 00 |.. a=f. | ...  ;.|
|00000650| 20 20 80 09 20 80 07 20 | 63 24 00 80 02 20 80 09 |  .. .. |c$... ..|
|00000660| 00 00 00 00 2e 57 72 69 | 74 65 54 43 50 00 80 08 |.....Wri|teTCP...|
|00000670| 20 57 72 69 74 65 54 43 | 50 7b 61 64 2e 6c 2c 73 | WriteTC|P{ad.l,s|
|00000680| 69 7a 65 2e 77 7d 00 20 | 20 80 15 20 73 6f 63 6b |ize.w}. | .. sock|
|00000690| 2e 6c 00 20 20 3b 00 20 | 20 3b 20 54 68 69 73 20 |.l.  ;. | ; This |
|000006a0| 72 6f 75 74 69 6e 65 20 | 77 72 69 74 65 73 20 64 |routine |writes d|
|000006b0| 61 74 61 20 76 69 61 20 | 54 43 50 2e 00 20 20 3b |ata via |TCP..  ;|
|000006c0| 00 20 20 73 6f 63 6b 77 | 72 69 74 65 2e 6c 3d 30 |.  sockw|rite.l=0|
|000006d0| 20 20 20 20 20 20 20 20 | 20 20 20 20 20 20 20 20 |        |        |
|000006e0| 20 20 20 20 20 20 20 20 | 20 3b 43 6c 65 61 72 20 |        | ;Clear |
|000006f0| 57 72 69 74 65 6d 61 73 | 6b 00 20 20 73 6f 63 6b |Writemas|k.  sock|
|00000700| 77 72 69 74 65 2e 6c 20 | 80 ce 20 73 6f 63 6b 2e |write.l |.. sock.|
|00000710| 6c 20 20 20 20 20 20 20 | 20 20 20 20 20 20 3b 73 |l       |      ;s|
|00000720| 65 74 20 57 72 69 74 65 | 6d 61 73 6b 20 6f 6e 20 |et Write|mask on |
|00000730| 6f 75 72 20 73 6f 63 6b | 65 74 00 20 20 67 3d ec |our sock|et.  g=.|
|00000740| 91 28 32 2c 30 2c 26 73 | 6f 63 6b 77 72 69 74 65 |.(2,0,&s|ockwrite|
|00000750| 2e 6c 2c 30 2c 30 2c 30 | 29 20 3b 57 61 69 74 20 |.l,0,0,0|) ;Wait |
|00000760| 75 6e 74 69 6c 20 73 65 | 72 76 65 72 20 69 73 20 |until se|rver is |
|00000770| 72 65 61 64 79 20 74 6f | 20 72 65 61 64 20 6f 75 |ready to| read ou|
|00000780| 72 20 64 61 74 61 00 20 | 20 63 3d ec 87 28 73 6f |r data. | c=..(so|
|00000790| 63 6b 2e 6c 2c 61 64 2c | 73 69 7a 65 2c 30 29 20 |ck.l,ad,|size,0) |
|000007a0| 20 20 20 20 20 20 20 20 | 20 20 20 20 3b 53 65 6e |        |    ;Sen|
|000007b0| 64 20 64 61 74 61 20 74 | 6f 20 73 65 72 76 65 72 |d data t|o server|
|000007c0| 00 80 02 20 80 08 00 00 | 00 00 00 2e 43 68 65 63 |... ....|....Chec|
|000007d0| 6b 54 43 50 00 80 09 20 | 2e 62 20 43 68 65 63 6b |kTCP... |.b Check|
|000007e0| 54 43 50 7b 7d 00 20 20 | 3b 00 20 20 3b 20 43 68 |TCP{}.  |;.  ; Ch|
|000007f0| 65 63 6b 20 69 66 20 54 | 43 50 20 53 74 61 63 6b |eck if T|CP Stack|
|00000800| 20 69 73 20 61 76 61 69 | 6c 61 62 6c 65 20 28 69 | is avai|lable (i|
|00000810| 65 20 4d 69 61 6d 69 2f | 41 6d 69 54 43 50 20 69 |e Miami/|AmiTCP i|
|00000820| 73 20 72 75 6e 6e 69 6e | 67 29 00 20 20 3b 20 52 |s runnin|g).  ; R|
|00000830| 65 74 75 72 6e 20 54 72 | 75 65 20 6f 72 20 46 61 |eturn Tr|ue or Fa|
|00000840| 6c 73 65 00 20 20 3b 00 | 20 20 6c 69 62 2e 6c 3d |lse.  ;.|  lib.l=|
|00000850| fe cf 28 22 62 73 64 73 | 6f 63 6b 65 74 2e 6c 69 |..("bsds|ocket.li|
|00000860| 62 72 61 72 79 22 2c 30 | 29 00 20 20 80 0b 20 6c |brary",0|).  .. l|
|00000870| 69 62 3d 30 00 20 20 20 | 20 80 09 20 80 07 20 bc |ib=0.   | .. .. .|
|00000880| 0f 00 20 20 80 22 00 20 | 20 20 20 fe bb 28 6c 69 |..  .". |   ..(li|
|00000890| 62 29 00 20 20 20 20 80 | 09 20 80 07 20 bc 0e 00 |b).    .|. .. ...|
|000008a0| 20 20 80 c0 00 80 02 20 | 80 09 00 00 00 00 2e 43 |  ..... |.......C|
|000008b0| 6f 6e 6e 65 63 74 54 43 | 50 00 80 09 20 2e 62 20 |onnectTC|P... .b |
|000008c0| 43 6f 6e 6e 65 63 74 54 | 43 50 7b 68 6f 73 74 24 |ConnectT|CP{host$|
|000008d0| 2c 70 6f 72 74 2e 77 7d | 00 20 20 80 15 20 73 6f |,port.w}|.  .. so|
|000008e0| 63 6b 2e 6c 00 20 20 3b | 00 20 20 3b 20 43 6f 6e |ck.l.  ;|.  ; Con|
|000008f0| 6e 65 63 74 20 74 6f 20 | 68 6f 73 74 20 61 74 20 |nect to |host at |
|00000900| 73 70 65 63 69 66 69 65 | 64 20 70 6f 72 74 00 20 |specifie|d port. |
|00000910| 20 3b 20 52 65 74 75 72 | 6e 20 74 72 75 65 20 6f | ; Retur|n true o|
|00000920| 72 20 46 61 6c 73 65 20 | 69 66 20 43 6f 6e 6e 65 |r False |if Conne|
|00000930| 63 74 69 6f 6e 20 69 73 | 20 6d 61 64 65 00 00 20 |ction is| made.. |
|00000940| 20 73 6f 63 6b 2e 6c 3d | ec 81 28 32 2c 31 2c 30 | sock.l=|..(2,1,0|
|00000950| 29 00 20 20 2a 61 2e 68 | 6f 73 74 65 6e 74 3d ec |).  *a.h|ostent=.|
|00000960| 9f 28 68 6f 73 74 24 29 | 00 00 20 20 3b 43 6f 70 |.(host$)|..  ;Cop|
|00000970| 79 20 44 65 74 61 69 6c | 73 20 74 6f 20 6f 75 72 |y Detail|s to our|
|00000980| 20 53 6f 63 6b 61 64 64 | 72 69 6e 20 73 74 72 75 | Sockadd|rin stru|
|00000990| 63 74 75 72 65 00 00 20 | 20 62 62 3d fe db 28 2a |cture.. | bb=..(*|
|000009a0| 61 2e 68 6f 73 74 65 6e | 74 5c 68 5f 61 64 64 72 |a.hosten|t\h_addr|
|000009b0| 5f 6c 69 73 74 5c 49 74 | 65 6d 41 2c 26 68 6f 73 |_list\It|emA,&hos|
|000009c0| 74 2e 73 6f 63 6b 61 64 | 64 72 69 6e 5c 73 69 6e |t.sockad|drin\sin|
|000009d0| 5f 61 64 64 72 2c 2a 61 | 2e 68 6f 73 74 65 6e 74 |_addr,*a|.hostent|
|000009e0| 5c 68 5f 6c 65 6e 67 74 | 68 29 00 00 20 20 68 6f |\h_lengt|h)..  ho|
|000009f0| 73 74 2e 73 6f 63 6b 61 | 64 64 72 69 6e 5c 73 69 |st.socka|ddrin\si|
|00000a00| 6e 5f 70 6f 72 74 3d 70 | 6f 72 74 20 20 20 20 20 |n_port=p|ort     |
|00000a10| 20 20 3b 53 65 74 20 70 | 6f 72 74 20 6e 75 6d 62 |  ;Set p|ort numb|
|00000a20| 65 72 00 20 20 68 6f 73 | 74 2e 73 6f 63 6b 61 64 |er.  hos|t.sockad|
|00000a30| 64 72 69 6e 5c 73 69 6e | 5f 66 61 6d 69 6c 79 3d |drin\sin|_family=|
|00000a40| 32 20 20 20 20 20 20 20 | 20 3b 53 65 74 20 74 79 |2       | ;Set ty|
|00000a50| 70 65 20 74 6f 20 41 54 | 5f 49 4e 45 54 00 20 20 |pe to AT|_INET.  |
|00000a60| 53 74 72 75 63 74 4c 65 | 6e 67 74 68 2e 6c 3d 80 |StructLe|ngth.l=.|
|00000a70| 2f 20 2e 73 6f 63 6b 61 | 64 64 72 69 6e 20 20 20 |/ .socka|ddrin   |
|00000a80| 3b 47 65 74 20 6c 65 6e | 67 68 74 20 6f 66 20 73 |;Get len|ght of s|
|00000a90| 74 72 75 63 74 75 72 65 | 20 73 6f 63 6b 61 64 64 |tructure| sockadd|
|00000aa0| 72 69 6e 00 00 20 20 80 | 0b 20 ec 85 28 73 6f 63 |rin..  .|. ..(soc|
|00000ab0| 6b 2e 6c 2c 68 6f 73 74 | 2e 73 6f 63 6b 61 64 64 |k.l,host|.sockadd|
|00000ac0| 72 69 6e 2c 53 74 72 75 | 63 74 4c 65 6e 67 74 68 |rin,Stru|ctLength|
|00000ad0| 29 3d 2d 31 00 20 20 20 | 20 ec 90 28 73 6f 63 6b |)=-1.   | ..(sock|
|00000ae0| 2e 6c 29 00 20 20 20 20 | 80 09 20 80 07 20 bc 0f |.l).    |.. .. ..|
|00000af0| 00 20 20 80 22 00 20 20 | 20 20 80 09 20 80 07 20 |.  .".  |  .. .. |
|00000b00| bc 0e 00 20 20 80 c0 00 | 20 20 3b 00 80 02 20 80 |...  ...|  ;... .|
|00000b10| 09 00 00 00 00 2e 43 6c | 6f 73 65 54 43 50 00 80 |......Cl|oseTCP..|
|00000b20| 08 20 43 6c 6f 73 65 54 | 43 50 7b 7d 00 20 20 80 |. CloseT|CP{}.  .|
|00000b30| 15 20 73 6f 63 6b 2e 6c | 00 20 20 3b 00 20 20 3b |. sock.l|.  ;.  ;|
|00000b40| 20 54 68 69 73 20 69 73 | 20 61 20 73 69 6d 70 6c | This is| a simpl|
|00000b50| 65 20 63 6c 6f 73 65 20 | 73 6f 63 6b 65 74 20 63 |e close |socket c|
|00000b60| 6f 6d 6d 61 6e 64 00 20 | 20 3b 20 50 72 6f 76 69 |ommand. | ; Provi|
|00000b70| 64 65 64 20 66 6f 72 20 | 74 68 65 20 73 68 65 61 |ded for |the shea|
|00000b80| 72 20 68 65 6c 6c 20 6f | 66 20 69 74 20 3a 29 00 |r hell o|f it :).|
|00000b90| 20 20 3b 00 20 20 ec 90 | 28 73 6f 63 6b 2e 6c 29 |  ;.  ..|(sock.l)|
|00000ba0| 00 80 02 20 80 08 00 00 | 00 00 00                |... ....|...     |
+--------+-------------------------+-------------------------+--------+--------+